home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Softdisk Magazette Volume 2, No. 06 (1983-02)(Softdisk)(Side A).zip / Softdisk Magazette Volume 2, No. 06 (1983-02)(Softdisk)(Side A).do / PAL.19808.MUNROE.JAN.83.A.bas < prev    next >
BASIC Source File  |  1996-12-24  |  1KB  |  37 lines
  1. 100  HOME 
  2. 105  ONERR  GOTO 900
  3. 110  VTAB 2
  4. 120  SPEED= 100
  5. 300  FOR X = 1 TO 20
  6. 310  READ D$
  7. 315  REM  PRINT MODE
  8. 320  PRINT : PRINT D$
  9. 400  IF X = 10  THEN  GOSUB 800: GOTO 300
  10. 490  NEXT X
  11. 800  FOR Y = 1 TO 2000: NEXT Y
  12. 810  HOME 
  13. 890  RETURN 
  14. 900  GOSUB 800
  15. 910  VTAB 12
  16. 920  PRINT "    THANKS PALS    "
  17. 930  SPEED= 255
  18. 999  PRINT  CHR$(4);"RUNPAL.MENU"
  19. 1000  DATA  I'M INTERESTED IN COMPUTERIZED HOUSES
  20. 1010  DATA  AND RECENTLY READ OF TWO IN NEW
  21. 1020  DATA   SHELTER MAGAZINE. UNFORTUNATELY
  22. 1030  DATA   BOTH OF THESE WERE CUSTOM HOUSES NOT
  23. 1040  DATA   SOMETHING I COULD ADAPT TO MY HOME.
  24. 1050  DATA   A FOLLOW-UP LETTER TO THE EDITOR
  25. 1060  DATA  REPORTED ON A COMMERCIAL TURNKEY
  26. 1070  DATA  SYSTEM CALLED TOMORROWHOUSE.  THIS
  27. 1080  DATA   SYSTEM IS AVAILABLE FROM
  28. 1085  DATA   COMPU-HOUSE INC. 
  29. 1090  DATA   I'VE WRITTEN FOR INFORMATION
  30. 1100  DATA  BUT WOULD APPRECIATE ANY PERSONAL
  31. 1110  DATA  OPINIONS.  HAS ANYONE HEARD OF THIS
  32. 1120  DATA  SYSTEM OR COMPANY?  HAS ANYONE USED IT?
  33. 1130  DATA  THANKS FOR YOUR HELP.
  34. 1140  DATA  WILLIAM MUNROE
  35. 1150  DATA  7 SAINT EDWARD CT.
  36. 1160  DATA  VILLAGE OF LINDELL
  37. 1170  DATA   WILMINGTON DE 19808